Simplification of discriminant from scale-rotated-ellipse

Time bar (total: 2.5min)

analyze603.0ms (0.4%)

Memory
13.0MiB live, 1 649.1MiB 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.5s (5%)

Memory
14.9MiB live, 19 888.4MiB allocated
Samples
4.8s4 231×1valid
1.1s995×2valid
736.0ms3 030×0valid
30.0ms77×1exit
Precisions
Click to see histograms. Total time spent on operations: 6.1s
ival-sin: 1.4s (23.1% of total)
ival-cos: 1.2s (19.8% of total)
ival-mult: 1.1s (17.4% of total)
ival-div: 1.0s (16.8% of total)
ival-pow2: 704.0ms (11.5% of total)
adjust: 311.0ms (5.1% of total)
ival-sub: 195.0ms (3.2% of total)
ival-add: 122.0ms (2% of total)
ival-pi: 53.0ms (0.9% of total)
exact: 14.0ms (0.2% of total)
ival-true: 7.0ms (0.1% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

preprocess240.0ms (0.2%)

Memory
-11.4MiB live, 585.6MiB 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 (+.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 (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 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 #s(literal 4 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)

explain1.0s (0.7%)

Memory
12.9MiB live, 3 331.5MiB 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)))
1280-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1280-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
370-0-(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
370-1(5.262446211731897e-159 1.4060606989601394e-174 9.951409665998677e-11 5.389576850327406e+196 7.607281955126094e-257)(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
320-0-(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
300-1(7.277656523175089e-299 5.654753570991592e-273 1.4088561604578158e+282 1.5351076748656594e-235 5.768129300310054e-128)(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
260-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))))
190-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
180-1(1.790060560147395e-93 3.740222838075321e-201 6.412494011285285e-231 3.890014841341141e-89 4.815498136335798e-201)(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
170-2(6.299662088682719e-256 7.352522866199967e-300 2.343686874176557e-24 6.233022783364666e+77 1.299556565117934e-197)(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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-rescue1310
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow174
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow226
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow188
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow174
(pow.f64 b #s(literal 2 binary64))overflow118
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))overflow131
(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))))overflow226
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow166
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow92
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow101
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow132
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow42
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow88
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow45
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow83
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow97
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow101
(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))overflow92
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1280
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1280
-.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)))cancellation290
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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*o260
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n250
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow101
(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))overflow42
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n240
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow87
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow113
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow113
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow87
(pow.f64 b #s(literal 2 binary64))overflow59
(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/n220
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow88
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow45
-.f64(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))nan-rescue190
(pow.f64 b #s(literal 2 binary64))overflow59
(pow.f64 a #s(literal 2 binary64))overflow73
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n180
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow87
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow113
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow87
(pow.f64 b #s(literal 2 binary64))overflow59
(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))))overflow113
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow83
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)o/n140
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow88
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow45
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow83
*.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*o120
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow48
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow62
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow24
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow87
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow26
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))underflow48
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow101
(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))overflow42
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow97
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow101
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n110
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow25
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow61
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow97
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow34
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n110
(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))overflow42
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow97
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow101
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n100
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow62
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow24
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow87
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
*.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*u100
*.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*u90
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow92
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow92
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow88
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow45
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow83
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow45
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow61
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow97
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow34
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow27
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow25
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n80
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
(pow.f64 b #s(literal 2 binary64))underflow62
(pow.f64 a #s(literal 2 binary64))underflow61
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow32
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n70
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
(pow.f64 b #s(literal 2 binary64))underflow62
(pow.f64 a #s(literal 2 binary64))underflow61
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
*.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*o60
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n40
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow61
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow97
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow34
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow27
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow25
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n30
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow62
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow24
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow87
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow26
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow4
Confusion
Predicted +Predicted -
+2010
-3619
Precision
0.8481012658227848
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+20100
-36019
Precision?
0.8481012658227848
Recall?
1.0
Freqs
test
numberfreq
019
155
253
362
435
525
66
71
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
325.0ms336×1valid
70.0ms64×2valid
30.0ms112×0valid
Compiler

Compiled 1 424 to 160 computations (88.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 356.0ms
ival-sin: 84.0ms (23.6% of total)
ival-mult: 70.0ms (19.6% of total)
ival-cos: 70.0ms (19.6% of total)
ival-pow2: 46.0ms (12.9% of total)
ival-div: 43.0ms (12.1% of total)
adjust: 21.0ms (5.9% of total)
ival-sub: 9.0ms (2.5% of total)
ival-add: 9.0ms (2.5% 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)

eval0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

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

Compiled 114 to 39 computations (65.8% saved)

simplify213.0ms (0.1%)

Memory
10.5MiB live, 577.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

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

Useful iterations: 0 (0.0ms)

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

localize288.0ms (0.2%)

Memory
-18.8MiB live, 897.9MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy86.4%
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
accuracy56.5%
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy55.6%
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy38.6%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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
160.0ms168×1valid
37.0ms32×2valid
15.0ms56×0valid
Compiler

Compiled 598 to 41 computations (93.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 177.0ms
ival-sin: 42.0ms (23.8% of total)
ival-mult: 35.0ms (19.8% of total)
ival-cos: 35.0ms (19.8% of total)
ival-pow2: 22.0ms (12.4% of total)
ival-div: 22.0ms (12.4% of total)
adjust: 9.0ms (5.1% of total)
ival-sub: 5.0ms (2.8% of total)
ival-add: 4.0ms (2.3% 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)

series144.0ms (0.1%)

Memory
22.9MiB live, 421.1MiB allocated
Counts
8 → 288
Calls
Call 1
Inputs
#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())
Outputs
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
Calls

72 calls:

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

simplify433.0ms (0.3%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
045216440
1176515416
0852515091
Stop Event
iter limit
node limit
Counts
288 → 288
Calls
Call 1
Inputs
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
Outputs
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 a (*.f64 a (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (*.f64 b (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (*.f64 b (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 angle (*.f64 angle (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 4 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale))))
(* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale))))
(* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale))))
(* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale))))
(* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 2 binary64)) (fma.f64 angle (*.f64 angle (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) #s(literal -29/30855889612800000000 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) b) b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(* 1/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 angle (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/30855889612800000000 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (PI.f64) (*.f64 (PI.f64) #s(literal -1/64800 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64)))) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/24488801280000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64)))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) b) b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))

rewrite357.0ms (0.2%)

Memory
23.5MiB live, 1 016.1MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 522×lower-*.f32
4 500×lower-*.f64
3 962×lower-/.f32
3 948×lower-/.f64
3 758×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
039262
070210
1266210
22077185
08541184
Stop Event
iter limit
node limit
iter limit
Counts
8 → 532
Calls
Call 1
Inputs
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
Outputs
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)) #s(literal 1 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 b))
(*.f64 b b)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)) #s(literal 1 binary64)))
(pow.f64 a #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 a))
(*.f64 a a)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) y-scale)))
(/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) (*.f64 (*.f64 x-scale y-scale) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -2 binary64))
(pow.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) y-scale))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (neg.f64 x-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 (neg.f64 (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 x-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 #s(literal 2 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 y-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (*.f64 y-scale (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal -4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal -4 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 #s(literal 1 binary64) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) y-scale) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 4 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale) y-scale)
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))) (neg.f64 (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (fma.f64 #s(literal 16 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))
(sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))
(cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(pow.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (*.f64 y-scale y-scale) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (neg.f64 y-scale) x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) x-scale)))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 4 binary64))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)) (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 4 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 4 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale))

eval179.0ms (0.1%)

Memory
22.3MiB live, 571.3MiB allocated
Compiler

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

prune232.0ms (0.2%)

Memory
-18.1MiB live, 791.8MiB allocated
Pruning

29 alts after pruning (29 fresh and 0 done)

PrunedKeptTotal
New1 077291 106
Fresh000
Picked101
Done000
Total1 078291 107
Accuracy
61.4%
Counts
1 107 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
16.4%
(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)))
19.2%
(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)))
20.1%
(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)))
23.6%
(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)))
15.2%
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
23.9%
(/.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)
19.1%
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
9.6%
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) 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)))
25.3%
(/.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.3%
(/.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))
22.3%
(-.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)))
22.4%
(-.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 y-scale (/.f64 x-scale (*.f64 (*.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)))
24.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) 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)))
23.6%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))))
24.4%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 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)))
25.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 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
15.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #s(approx (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))))
16.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)) #s(approx (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))))
29.2%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #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)))
24.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) (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)))
25.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #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)))
32.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) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 b b))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
32.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
16.4%
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
48.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
15.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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
37.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 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
38.7%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
Compiler

Compiled 5 952 to 2 418 computations (59.4% saved)

simplify281.0ms (0.2%)

Memory
-15.2MiB live, 747.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
cost-diff768
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))
cost-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
cost-diff0
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
cost-diff0
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
cost-diff0
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
cost-diff128
(-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff384
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))
cost-diff960
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
cost-diff0
(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)))
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-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff0
(*.f64 #s(literal -4 binary64) (*.f64 b b))
cost-diff0
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
cost-diff0
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
Rules
7 104×lower-*.f32
7 020×lower-*.f64
4 886×lower-fma.f32
4 876×lower-fma.f64
3 346×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01313198
02233186
15042965
219212955
375092955
080192863
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
(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)))
#s(literal -4 binary64)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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)))))))))
b
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
#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 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
a
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.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 x-scale x-scale)
x-scale
(*.f64 y-scale y-scale)
y-scale
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 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 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
(*.f64 x-scale (*.f64 x-scale y-scale))
x-scale
(*.f64 x-scale y-scale)
y-scale
(neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a a)
(neg.f64 y-scale)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
#s(literal 4 binary64)
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 2 binary64)
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(*.f64 y-scale y-scale)
y-scale
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 b b)
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 a a)
(fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 x-scale 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) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
#s(literal 2 binary64)
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
b
(pow.f64 a #s(literal 2 binary64))
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
x-scale
y-scale
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle #s(literal 1/180 binary64))
#s(literal 1/180 binary64)
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#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 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 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.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)
Outputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 a a)
a
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale 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 (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))
#s(literal -4 binary64)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
b
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (*.f64 angle (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 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
a
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (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 (*.f64 angle (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 x-scale x-scale)
x-scale
(*.f64 y-scale 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 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 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 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.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))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))
(-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (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 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (*.f64 angle (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
(neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.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)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-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 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(*.f64 a a)
(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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (fma.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(*.f64 (fma.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))
#s(literal 4 binary64)
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(fma.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 2 binary64)
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(*.f64 y-scale y-scale)
y-scale
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 b (*.f64 b (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 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 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))))
(*.f64 b b)
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))
(*.f64 a a)
(fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))))
(*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))
(*.f64 x-scale 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) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))
#s(literal 2 binary64)
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(*.f64 (+.f64 b a) (-.f64 b a))
(pow.f64 b #s(literal 2 binary64))
(*.f64 b b)
b
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))
(/.f64 angle #s(literal 180 binary64))
angle
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
x-scale
y-scale
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.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)))))))))) x-scale) #s(literal 1 binary64))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-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 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle #s(literal 1/180 binary64))
#s(literal 1/180 binary64)
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1 binary64)
(*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(*.f64 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 y-scale y-scale) (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 y-scale (fma.f64 b (*.f64 b (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.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 (*.f64 angle (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(*.f64 a a)

localize1.2s (0.8%)

Memory
9.7MiB live, 3 768.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy57.8%
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy57.7%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy57.0%
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy40.6%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))))
accuracy71.5%
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
accuracy57.8%
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy57.0%
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy40.2%
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
accuracy76.8%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
accuracy57.7%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy56.8%
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy47.6%
(-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))
accuracy72.2%
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
accuracy57.7%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy56.8%
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy40.6%
(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)))
accuracy94.2%
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy84.4%
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy76.9%
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
accuracy75.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))))
Samples
424.0ms160×1valid
317.0ms88×2valid
11.0ms3valid
10.0ms5exit
4.0ms2exit
3.0ms1exit
1.0ms0valid
Compiler

Compiled 3 131 to 122 computations (96.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 638.0ms
ival-mult: 160.0ms (25.1% of total)
ival-cos: 128.0ms (20.1% of total)
ival-sin: 118.0ms (18.5% of total)
ival-div: 67.0ms (10.5% of total)
adjust: 50.0ms (7.8% of total)
ival-pow2: 47.0ms (7.4% of total)
ival-add: 24.0ms (3.8% of total)
ival-sub: 19.0ms (3% of total)
const: 16.0ms (2.5% of total)
ival-neg: 5.0ms (0.8% of total)
ival-pi: 2.0ms (0.3% of total)
exact: 1.0ms (0.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series368.0ms (0.2%)

Memory
11.9MiB live, 1 126.4MiB allocated
Counts
29 → 984
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 #s(literal 1/2 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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())
#s(alt (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 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
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 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 (* 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 (+ (* -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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (taylor 0 b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor -inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b)))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (taylor 0 a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale)) (taylor -inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a)))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale)) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (patch (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* b (- (* b (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* b (- (* b (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf b) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* a (- (* a (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* a (- (* a (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) (taylor 0 a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))))) (taylor inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) (taylor -inf a) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (taylor 0 angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (taylor 0 angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (- (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (taylor 0 angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* (pow angle 2) (- (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (taylor 0 angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) (taylor -inf angle) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor 0 y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor 0 y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor 0 y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor 0 y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale) (taylor inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale)) (taylor -inf y-scale) (#s(alt (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (patch (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #<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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<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/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 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/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* 4 (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b))))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b))))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* 4 (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)))) (taylor inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a))))) (taylor inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a))))) (taylor inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* 4 (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (- (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -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 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 y-scale 2)) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)) (/ (* (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 y-scale 2)))))))) (* 4 (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* 4 (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))) (taylor 0 b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)))) (taylor inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b))))) (taylor inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b))))) (taylor inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* 4 (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))) (taylor 0 a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)))) (taylor inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a))))) (taylor inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a))))) (taylor inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (patch (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (taylor 0 angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (taylor 0 angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (taylor 0 angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -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 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 y-scale 2)) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)) (/ (* (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 y-scale 2))))))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (taylor 0 angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor -inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor -inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor -inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (taylor -inf angle) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2)) (taylor 0 b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* b (- (+ (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* b (+ (* b (- (+ (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (taylor inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (taylor -inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2)) (taylor 0 a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* a (- (+ (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* a (+ (* a (- (+ (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (taylor inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (taylor -inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (patch (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<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)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) (patch (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #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)))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (patch (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt 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 (- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
Calls

246 calls:

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

simplify645.0ms (0.4%)

Memory
30.9MiB live, 1 900.7MiB allocated
Algorithm
egg-herbie
Rules
6 448×lower-*.f64
6 448×lower-*.f32
5 586×lower-fma.f64
5 586×lower-fma.f32
3 798×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0160170393
1615168965
0840866588
Stop Event
iter limit
node limit
Counts
984 → 984
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)))
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))))))
(* 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))))))
(+ (* -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 a 2) (pow b 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 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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 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))
(* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -1 (/ (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))))))
(* -1 (/ (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -1 (/ (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))))))
(* -1 (/ (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))
(+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))))))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))
(+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* b (- (* b (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* b (- (* b (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* a (- (* a (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(- (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* a (- (* a (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (- (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* (pow angle 2) (- (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 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/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 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 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 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/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* b (+ (* 4 (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* 4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)))))
(* -4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))
(* -1 (* (pow b 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* a (+ (* 4 (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* 4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)))))
(* -4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))
(* -1 (* (pow a 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* 4 (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2)))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (- (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -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 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 y-scale 2)) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)) (/ (* (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 y-scale 2)))))))) (* 4 (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)))))))))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
(* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2)))
(* b (+ (* 4 (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2)))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)))))
(* -4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))
(* -1 (* (pow b 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))))
(* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2)))
(* a (+ (* 4 (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2)))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)))))
(* -4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))
(* -1 (* (pow a 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))
(* -1 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(- (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -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 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 y-scale 2)) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)) (/ (* (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 y-scale 2))))))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))
(* b (+ (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))
(* b (+ (* b (- (+ (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))
(* b (+ (* b (- (+ (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))
(/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))
(* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))))))
(* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))))))
(* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))))))
(* -1 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))
(* -1 (* (pow b 3) (+ (* -1 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))
(* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))
(* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))
(/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))
(* a (+ (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))
(* a (+ (* a (- (+ (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))
(* a (+ (* a (- (+ (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))
(/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))
(* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))))))
(* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))))))
(* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))))))
(* -1 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))
(* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))
(* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))
(* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 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 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow 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) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (pow 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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 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 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow 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 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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 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))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* 1/90 (* angle (PI)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
1
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(* (pow 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/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
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))))
Outputs
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 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))) (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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (* (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))
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 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64))) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64))) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))
(* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(* (pow angle 2) (- (* (pow angle 2) (- (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.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))))
(* (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)))
(+ (* -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 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.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)))))
(+ (* -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 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.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) (/.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 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.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 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #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) (/.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 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.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 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #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) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b)) b))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow 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) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)) b))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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 #s(literal -1/196830000 binary64) (*.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)))) (/.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 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (/.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (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 #s(literal -1/196830000 binary64) (*.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))))) (/.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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #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 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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.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)))))
(+ (* -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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.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) (/.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 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.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 #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) (/.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 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.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 #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 #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) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a)) a))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow 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) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) a)) a))))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 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 x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(-.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* -1 (* b (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(fma.f64 b (fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.f64 b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)))
(+ (* -1 (/ (- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* b (+ (* b (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(-.f64 (*.f64 b (fma.f64 b (-.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(* -1 (/ (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (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 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* -1 (/ (* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))))
(* (pow b 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* b y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) b))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b y-scale)) (-.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 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (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 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (neg.f64 b))) b)))
(* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))
(-.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))
(+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* -1 (* a (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(fma.f64 a (fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.f64 a) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)))
(+ (* -1 (/ (- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (* a (+ (* a (+ (* -1 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))))
(fma.f64 a (fma.f64 a (-.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)))
(* -1 (/ (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (+ (* -1 (/ (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (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 a (*.f64 a 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 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale)))
(* -1 (/ (* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale)))) y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 y-scale))
(* (pow a 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) y-scale))))
(* (pow a 4) (+ (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale)) (* -1 (/ (- (+ (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (* a y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) a))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a y-scale)) (-.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 (- (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (* -1 (/ (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale)) (/.f64 (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 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (neg.f64 a))) a)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.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))) #s(literal -1/8100 binary64))) (neg.f64 (*.f64 angle angle)) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
(fma.f64 #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) (neg.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) 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))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.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))) #s(literal -1/8100 binary64)))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1 (- (* 4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))) y-scale)) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))) y-scale)) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (- (* 4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))) y-scale)) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) y-scale) (neg.f64 (*.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)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) 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))))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) y-scale) (*.f64 (/.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))) #s(literal -1/8100 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))) y-scale))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (neg.f64 y-scale))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (* (pow x-scale 2) y-scale)))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b))))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b))))))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b))))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))))))
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) y-scale)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale)))
(/.f64 (*.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 (*.f64 x-scale x-scale) y-scale))
(- (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 b (*.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 x-scale x-scale) y-scale)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(- (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* b (- (* b (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 b (fma.f64 b (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(- (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* b (- (* b (- (+ (* -1 (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b (*.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 x-scale x-scale) y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.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 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.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 (*.f64 x-scale x-scale) y-scale)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow b 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow b 2))))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 b b))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow b 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(* (pow b 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 b)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))) b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow b 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) y-scale))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) y-scale))) b)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (neg.f64 b)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))) b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 a (*.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 x-scale x-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) y-scale)))
(- (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* a (- (* a (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 a (fma.f64 a (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (pow.f64 (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) y-scale)))
(- (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) y-scale))) (* a (- (* a (- (+ (* -1 (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) y-scale))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) y-scale))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) y-scale)))
(-.f64 (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a (*.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 x-scale x-scale) y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.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 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (pow.f64 (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) y-scale)))
(* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow a 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a a))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) y-scale)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale))) (pow a 2))))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) y-scale))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 a 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 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow a 4) (- (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))))
(* (pow a 4) (- (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (neg.f64 a)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))) a)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* (pow a 4) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) y-scale)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) y-scale))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) y-scale))) a)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) y-scale)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) y-scale))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale)))))) (neg.f64 a)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))) a)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (/.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) y-scale)) #s(literal -1/8100 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (- (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-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) y-scale)) #s(literal 1/196830000 binary64))) (*.f64 (/.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) y-scale)) #s(literal -1/8100 binary64)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) y-scale))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)))) (* (pow angle 2) (- (+ (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale))))) (* (pow angle 2) (- (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) y-scale)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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) y-scale)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (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) y-scale)) #s(literal 1/196830000 binary64)))) (*.f64 (/.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) y-scale)) #s(literal -1/8100 binary64)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) y-scale))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) y-scale)))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.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))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) y-scale)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) y-scale)) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(/ (- (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) y-scale)
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.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))) (neg.f64 (*.f64 x-scale x-scale)))) y-scale)
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(* -1 (/ (- (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 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))) (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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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 #s(literal 4 binary64) (*.f64 angle angle)) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (-.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -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/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 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/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 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))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.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 (*.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 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))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* b (+ (* 4 (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 b (*.f64 #s(literal 4 binary64) (fma.f64 b (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 b (fma.f64 b (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 b (fma.f64 b (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b))))
(*.f64 (*.f64 b (*.f64 b b)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)))))
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)))))
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -1 (* (pow b 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 b (*.f64 b b))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) b)) (neg.f64 (*.f64 b (*.f64 b b))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) b)) (neg.f64 (*.f64 b (*.f64 b b))))
(* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* a (+ (* 4 (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 a (*.f64 #s(literal 4 binary64) (fma.f64 a (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 a (fma.f64 a (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 a (fma.f64 a (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 a (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a))))
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)))))
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)))))
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -1 (* (pow a 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(neg.f64 (*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal -4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(neg.f64 (*.f64 (*.f64 a (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) a))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 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))))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))))))
(neg.f64 (*.f64 (*.f64 a (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) a))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (pow x-scale 2)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* 4 (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2)))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 angle angle)) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))))))
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (-.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 y-scale y-scale)) #s(literal -1/787320000 binary64)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* 4 (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (- (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -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 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 y-scale 2)) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)) (/ (* (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 y-scale 2)))))))) (* 4 (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.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 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 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 y-scale y-scale))))))) (-.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 y-scale y-scale)) #s(literal -1/787320000 binary64)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))
(* b (+ (* 4 (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2)))))
(*.f64 b (*.f64 #s(literal 4 binary64) (fma.f64 b (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))))))
(*.f64 b (fma.f64 b (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))))
(* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))))))
(*.f64 b (fma.f64 b (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b))))
(*.f64 (*.f64 b (*.f64 b b)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)))))
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b)))))
(* (pow b 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)))))
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b)))))
(* -4 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))
(* -1 (* (pow b 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))))
(*.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 b (*.f64 b b))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))))
(*.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 b (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) b)) (neg.f64 (*.f64 b (*.f64 b b))))
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))))))
(*.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 b (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) b)) (neg.f64 (*.f64 b (*.f64 b b))))
(* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 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)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))
(* a (+ (* 4 (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2)))))
(*.f64 a (*.f64 #s(literal 4 binary64) (fma.f64 a (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))))))
(*.f64 a (fma.f64 a (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))))
(* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))))))
(*.f64 a (fma.f64 a (*.f64 #s(literal 4 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 a (*.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)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a))))
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)))))
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))))
(* (pow a 3) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)))))
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a (*.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)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))
(* -1 (* (pow a 3) (+ (* -4 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))))
(*.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 a (*.f64 a a))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))))
(*.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale)))) a)) (neg.f64 (*.f64 a (*.f64 a a))))
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))))))
(*.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale)))) a)) (neg.f64 (*.f64 a (*.f64 a a))))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))
(* -1 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(*.f64 (*.f64 a (neg.f64 a)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (neg.f64 a)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 (*.f64 angle angle) (-.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 y-scale y-scale)) #s(literal -1/787320000 binary64)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (neg.f64 a)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (- (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))) (+ (/ (* (+ (* -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 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 y-scale 2)) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)) (/ (* (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 y-scale 2))))))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (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 y-scale y-scale)) #s(literal -1/787320000 binary64) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.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 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 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 y-scale y-scale))))))))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (neg.f64 a)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale))))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)) (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))
(* b (+ (* b (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))
(*.f64 b (fma.f64 b (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))))
(* b (+ (* b (- (+ (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))
(*.f64 b (fma.f64 b (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))))
(* b (+ (* b (- (+ (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))))
(*.f64 b (fma.f64 b (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))))
(/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))
(* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))))))
(*.f64 (*.f64 b (*.f64 b b)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 b (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 b (*.f64 y-scale y-scale))))))
(* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))))))
(*.f64 (*.f64 b (*.f64 b b)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 b (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 b (*.f64 y-scale y-scale))))))
(* (pow b 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* b (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* b (pow y-scale 2))))))
(*.f64 (*.f64 b (*.f64 b b)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 b (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 b (*.f64 y-scale y-scale))))))
(* -1 (/ (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (* (pow b 3) (+ (* -1 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))
(*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b)) (neg.f64 (*.f64 b (*.f64 b b))))
(* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))
(neg.f64 (*.f64 (*.f64 b (*.f64 b b)) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 b (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b))))
(* -1 (* (pow b 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) b)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))))
(neg.f64 (*.f64 (*.f64 b (*.f64 b b)) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 b (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) b))))
(/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))
(* a (+ (* a (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))
(*.f64 a (fma.f64 a (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))))
(* a (+ (* a (- (+ (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))
(*.f64 a (fma.f64 a (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))))
(* a (+ (* a (- (+ (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))))
(*.f64 a (fma.f64 a (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))))
(/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 (*.f64 a (*.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)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))
(* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))))))
(*.f64 (*.f64 a (*.f64 a a)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 a (*.f64 y-scale y-scale))))))
(* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))))))
(*.f64 (*.f64 a (*.f64 a a)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 a (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 a (*.f64 y-scale y-scale))))))
(* (pow a 3) (- (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* a (pow y-scale 2))) (+ (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* a (pow y-scale 2))))))
(*.f64 (*.f64 a (*.f64 a a)) (-.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 a (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 a (*.f64 y-scale y-scale))))))
(* -1 (/ (* (pow a 3) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a (*.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)) #s(literal 0 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(* -1 (* (pow a 3) (+ (* -1 (/ (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))
(*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a)) (neg.f64 (*.f64 a (*.f64 a a))))
(* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))
(*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 a (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a)) (neg.f64 (*.f64 a (*.f64 a a))))
(* -1 (* (pow a 3) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) a)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))))
(*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 a (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) a)) (neg.f64 (*.f64 a (*.f64 a a))))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(/ (- (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(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) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.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)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 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 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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 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))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a 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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.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)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (+.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.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))))
(/.f64 (*.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 (*.f64 x-scale 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 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.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) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 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) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 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) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 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) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 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) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 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) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale)))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale y-scale))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 angle (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (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/1511654400000 binary64) (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.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/8748000 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) #s(literal -1/1469328076800000000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) #s(literal -1/3856986201600000000 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/1511654400000 binary64) (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 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/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 #s(literal -1/4374000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 (PI.f64) #s(literal 1/90 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/708588000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/4374000 binary64))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/241061637600000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/708588000000 binary64))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/4374000 binary64))) (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 binary64) (*.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64))) #s(literal 1 binary64))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* (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/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (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 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(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 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(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 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(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 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(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 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.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))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 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))) (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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* 1/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (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 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))

rewrite454.0ms (0.3%)

Memory
3.6MiB live, 1 359.4MiB allocated
Algorithm
batch-egg-rewrite
Rules
5 666×lower-*.f32
5 586×lower-*.f64
3 924×lower-fma.f32
3 914×lower-fma.f64
3 846×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01311352
02231150
1935968
08812967
Stop Event
iter limit
node limit
iter limit
Counts
29 → 867
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 #s(literal 1/2 binary64) (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 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) #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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(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 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))))))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
Outputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale)
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.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 #s(literal -4 binary64) (*.f64 b b)) (*.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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 b (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 (*.f64 b #s(literal -4 binary64)) b)
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 180 binary64))
(/.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) #s(literal 180 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 angle (*.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/180 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (*.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))
(*.f64 (*.f64 #s(literal 2 binary64) angle) (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 angle #s(literal 1/180 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 1/180 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) #s(literal 1 binary64)) (PI.f64))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (fma.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (cos.f64 (-.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(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 1 binary64))
(pow.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(*.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (cos.f64 (fma.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(+.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (exp.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))) (exp.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))) y-scale)
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (*.f64 (neg.f64 y-scale) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 #s(literal 1 binary64))) (*.f64 y-scale (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 y-scale (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 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 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64)) (neg.f64 y-scale))
(/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) y-scale)
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(*.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (exp.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))) (exp.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))) y-scale)
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (*.f64 (neg.f64 y-scale) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 #s(literal 1 binary64))) (*.f64 y-scale (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 y-scale (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 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 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64)) (neg.f64 y-scale))
(/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) y-scale)
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(*.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (*.f64 x-scale (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) x-scale)
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) x-scale)
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) x-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 x-scale))
(/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) x-scale) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))
(*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (*.f64 x-scale y-scale)))
(*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) y-scale) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) y-scale))
(+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(+.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(+.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 0 binary64)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))
(-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))))
(-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64)) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) y-scale) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (neg.f64 y-scale))) (*.f64 (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))) (*.f64 x-scale y-scale)))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale (neg.f64 y-scale))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.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 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale (neg.f64 x-scale))))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale)
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) x-scale) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 x-scale))))
(*.f64 (/.f64 #s(literal 4 binary64) x-scale) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 4 binary64) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 4 binary64))
(+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))))
(fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64) (*.f64 (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale y-scale))
(/.f64 (*.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)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (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 4 binary64)) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) #s(literal 4 binary64)) (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)) #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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(+.f64 (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 y-scale (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (/.f64 (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (neg.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.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 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.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)) y-scale) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) y-scale) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.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 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) y-scale) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.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)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale)) y-scale)
(/.f64 (-.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 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (-.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 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (-.f64 y-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) y-scale))
(/.f64 (-.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)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (-.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)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (-.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)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) y-scale) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale))) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) y-scale))
(/.f64 (-.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 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale)) (*.f64 y-scale y-scale)) (*.f64 y-scale (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 y-scale y-scale)))
(/.f64 (-.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 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 #s(literal 1 binary64))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale)) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 y-scale (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (-.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 (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale)) y-scale) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (neg.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (+.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) y-scale) y-scale)
(/.f64 (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 y-scale y-scale))
(*.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))
(*.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(*.f64 (-.f64 (pow.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(*.f64 b b)
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)))
(pow.f64 a #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a)) #s(literal 2 binary64))
(*.f64 a a)
(*.f64 (exp.f64 (log.f64 a)) (exp.f64 (log.f64 a)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (neg.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 x-scale)))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) x-scale)
(/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (*.f64 x-scale y-scale)) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale))) x-scale)
(/.f64 (*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)) x-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal -1 binary64)) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)))
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 4 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)))
(*.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) x-scale) (/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (*.f64 x-scale y-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))
(*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 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)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) #s(literal 1 binary64)))
(neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale))
(neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) y-scale)
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 1 binary64)) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a))))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) y-scale) x-scale)
(/.f64 (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) y-scale)
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) #s(literal -1 binary64)) y-scale)
(pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal -1 binary64))
(*.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale)))
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))
(*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))
(*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) y-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 y-scale))))
(*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))
(*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (pow.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 1 binary64)) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) x-scale))
(*.f64 (/.f64 (+.f64 b a) x-scale) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) y-scale))
(*.f64 (/.f64 (+.f64 b a) y-scale) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) x-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) y-scale))
(*.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 1/2 binary64)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) x-scale)
(*.f64 (*.f64 x-scale y-scale) y-scale)
(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)
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (-.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(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)
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))
(+.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)) (neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) x-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (exp.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))) (exp.f64 (log.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) y-scale) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))) y-scale)
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (*.f64 (neg.f64 y-scale) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 #s(literal 1 binary64))) (*.f64 y-scale (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 x-scale (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) x-scale)))) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale))) (*.f64 y-scale (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 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 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64)) (neg.f64 y-scale))
(/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (fma.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) y-scale)) (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) y-scale)
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal -1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (neg.f64 y-scale))))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(*.f64 (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 a (*.f64 a (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.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 (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))

eval647.0ms (0.4%)

Memory
19.3MiB live, 1 746.6MiB allocated
Compiler

Compiled 366 558 to 8 837 computations (97.6% saved)

prune6.1s (4.1%)

Memory
-7.8MiB live, 22 421.4MiB allocated
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New3 232203 252
Fresh23124
Picked505
Done000
Total3 260213 281
Accuracy
86.3%
Counts
3 281 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.0%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) x-scale) (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI))))))))) (* x-scale y-scale)))) (/.f64 (fma.f64 #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)))) 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))) (neg.f64 y-scale))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
28.6%
(/.f64 #s(approx (- (neg (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale)))) (neg (/ (* (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) x-scale) (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI))))))))) (* x-scale y-scale)))) (-.f64 (fma.f64 a (fma.f64 a (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (/.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 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 x-scale x-scale) y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 (pow.f64 (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) y-scale)))) (neg.f64 y-scale))
22.3%
(-.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)))
50.3%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
60.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale))
52.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
53.8%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
58.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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))
50.1%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale))))
59.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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)))
67.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 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale)))
74.9%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
63.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 a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))))
57.2%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))))
64.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) 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 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale y-scale))))
64.4%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
66.1%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
66.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
62.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
26.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))) #s(approx (/ (* 4 (- (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a))))) (* y-scale y-scale)) (/ (* (+ (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* y-scale y-scale)))) (* x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
Compiler

Compiled 1 516 to 782 computations (48.4% saved)

simplify215.0ms (0.1%)

Memory
9.2MiB live, 566.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
cost-diff384
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
cost-diff384
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
cost-diff0
(*.f64 a a)
cost-diff0
(/.f64 (*.f64 a 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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))))
cost-diff384
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
cost-diff0
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
cost-diff0
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
cost-diff0
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
cost-diff0
(*.f64 b (*.f64 b (*.f64 a a)))
cost-diff0
(/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
cost-diff0
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
cost-diff0
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
cost-diff0
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
cost-diff384
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
Rules
8 682×lower-*.f32
8 644×lower-*.f64
2 300×lower-/.f32
2 282×lower-/.f64
2 044×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
073936
0101936
1236936
2853926
34495926
46988926
08283921
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
#s(literal -4 binary64)
(/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 b (*.f64 a a)))
b
(*.f64 b (*.f64 a a))
(*.f64 a a)
a
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
y-scale
(*.f64 x-scale (*.f64 x-scale y-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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
(*.f64 a a)
a
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a a) (*.f64 x-scale y-scale))
(*.f64 a a)
a
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b a))) (*.f64 x-scale y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b a)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
#s(literal -4 binary64)
(/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 b (*.f64 a a)))
b
(*.f64 b (*.f64 a a))
(*.f64 a a)
a
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
y-scale
(*.f64 x-scale (*.f64 x-scale y-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 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a))))
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))
(*.f64 a a)
a
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a a) (*.f64 x-scale y-scale))
(*.f64 a a)
a
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))
(/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b a)))) x-scale)
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.f64 (*.f64 a a) x-scale)
(*.f64 a a)
a
x-scale
(*.f64 y-scale y-scale)
y-scale

localize357.0ms (0.2%)

Memory
4.9MiB live, 1 123.5MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy91.9%
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
accuracy85.7%
(/.f64 (*.f64 a a) x-scale)
accuracy78.5%
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))
accuracy72.9%
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
accuracy100.0%
(*.f64 #s(literal -4 binary64) (*.f64 b b))
accuracy82.7%
(/.f64 (*.f64 a a) (*.f64 x-scale y-scale))
accuracy82.0%
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
accuracy80.7%
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
accuracy93.8%
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy88.8%
(*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64)))
accuracy84.0%
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy75.2%
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy94.4%
(*.f64 b (*.f64 b (*.f64 a a)))
accuracy94.1%
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
accuracy88.8%
(*.f64 b (*.f64 a a))
accuracy75.8%
(/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
accuracy92.6%
(/.f64 a (*.f64 x-scale y-scale))
accuracy90.4%
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy89.6%
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
accuracy82.9%
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
Samples
179.0ms145×1valid
44.0ms32×2valid
38.0ms79×0valid
Compiler

Compiled 848 to 70 computations (91.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 214.0ms
ival-mult: 59.0ms (27.6% of total)
ival-sin: 42.0ms (19.6% of total)
ival-cos: 34.0ms (15.9% of total)
ival-div: 33.0ms (15.4% of total)
ival-pow2: 23.0ms (10.7% of total)
adjust: 11.0ms (5.1% of total)
ival-sub: 5.0ms (2.3% of total)
ival-add: 4.0ms (1.9% of total)
ival-pi: 2.0ms (0.9% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series184.0ms (0.1%)

Memory
9.1MiB live, 567.8MiB allocated
Counts
28 → 1 068
Calls
Call 1
Inputs
#s(alt (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a 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 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())
#s(alt (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 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 a) (#s(alt (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.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 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 a a))) (patch (*.f64 b (*.f64 b (*.f64 a 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 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (patch (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) b)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) (patch (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (*.f64 a a) (patch (*.f64 a a) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (*.f64 a a) (patch (*.f64 a 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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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) 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 (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) 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

267 calls:

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

simplify562.0ms (0.4%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
021238112
177336262
2367435192
0821434552
Stop Event
iter limit
node limit
Counts
1 068 → 1 068
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))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (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 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (* (pow a 2) b))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(/ (pow a 2) (* x-scale y-scale))
(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 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-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) 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)
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale 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))
(/ (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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* -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 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 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))))) #s(literal 1/32400 binary64)) (*.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 a (*.f64 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 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 (*.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)))) (/.f64 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (+.f64 b a) (-.f64 b a)) (*.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 (*.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 #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) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* -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 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 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))))) #s(literal 1/32400 binary64)) (*.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 a (*.f64 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 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 (*.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)))) (/.f64 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (+.f64 b a) (-.f64 b a)) (*.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 (*.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 #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) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* -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 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 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))))) #s(literal 1/32400 binary64)) (*.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 a (*.f64 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 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 (*.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)))) (/.f64 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (+.f64 b a) (-.f64 b a)) (*.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 (*.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 #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) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (* (pow a 2) b))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* -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 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 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))))) #s(literal 1/32400 binary64)) (*.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 a (*.f64 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 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 (*.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)))) (/.f64 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (+.f64 b a) (-.f64 b a)) (*.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 (*.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 #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) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(/ (pow a 2) (* x-scale y-scale))
(*.f64 a (/.f64 a (*.f64 x-scale y-scale)))
(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 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 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #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 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #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)))))))
(* -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 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 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))))) #s(literal 1/32400 binary64)) (*.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 a (*.f64 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 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 (*.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)))) (/.f64 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 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 #s(literal 1/3149280000 binary64) (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -1/3149280000 binary64)))) (/.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 (+.f64 b a) (-.f64 b a)) (*.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 (*.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 #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) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (/.f64 (*.f64 b b) x-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 a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale))
(* -4 (/ (pow b 2) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.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))
(/ (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)

rewrite338.0ms (0.2%)

Memory
-2.2MiB live, 951.2MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 918×lower-*.f32
4 880×lower-*.f64
3 380×lower-fma.f64
3 380×lower-fma.f32
3 196×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

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

eval801.0ms (0.5%)

Memory
-125.8MiB live, 1 154.8MiB allocated
Compiler

Compiled 74 686 to 1 795 computations (97.6% saved)

prune1.1min (44.2%)

Memory
-429.2MiB live, 175 151.6MiB allocated
Pruning

28 alts after pruning (27 fresh and 1 done)

PrunedKeptTotal
New2 710242 734
Fresh13316
Picked415
Done000
Total2 727282 755
Accuracy
94.7%
Counts
2 755 → 28
Alt Table
Click to see full alt table
StatusAccuracyProgram
59.9%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (/.f64 y-scale (*.f64 a a))))) x-scale))
70.1%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
72.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 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) 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 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale (neg.f64 y-scale)))))
58.9%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale))))
66.4%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 b (*.f64 b (/.f64 (*.f64 a a) x-scale))) y-scale)) x-scale))
71.3%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale)))) (*.f64 x-scale (neg.f64 y-scale))))
64.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))
60.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 b) (*.f64 a (*.f64 #s(literal -4 binary64) b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
55.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 #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)))
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 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 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 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale)))
73.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale y-scale))))
55.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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
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 a (/.f64 a (*.f64 x-scale y-scale))) #s(literal -4 binary64)) (*.f64 b (/.f64 b (*.f64 x-scale y-scale)))))
80.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 #s(literal -4 binary64)) (*.f64 b (/.f64 b (*.f64 x-scale y-scale)))) (/.f64 a (*.f64 x-scale y-scale))))
76.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
64.4%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
66.1%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
66.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
55.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
73.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 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))))
64.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 a (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
58.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 #s(literal -4 binary64) (/.f64 (/.f64 (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) y-scale)) (*.f64 x-scale x-scale)) y-scale)))
69.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 -4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 a b)) a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
72.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
56.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (/.f64 (*.f64 a a) x-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
62.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 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
Compiler

Compiled 1 283 to 768 computations (40.1% saved)

simplify247.0ms (0.2%)

Memory
16.0MiB live, 522.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
cost-diff0
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) 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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
cost-diff384
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
cost-diff0
(*.f64 #s(literal -4 binary64) (*.f64 b b))
cost-diff0
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
cost-diff384
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale)))
cost-diff0
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
cost-diff0
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
cost-diff0
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
cost-diff0
(*.f64 (*.f64 a b) (*.f64 a b))
cost-diff0
(/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
cost-diff0
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
cost-diff0
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b)
cost-diff0
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
cost-diff384
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
Rules
8 628×lower-*.f32
8 582×lower-*.f64
2 512×lower-/.f32
2 500×lower-/.f64
2 030×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075925
0105925
1237925
2845915
34582915
47163915
08451910
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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b)
(*.f64 a (*.f64 #s(literal -4 binary64) b))
a
(*.f64 #s(literal -4 binary64) b)
#s(literal -4 binary64)
b
(*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
#s(literal -4 binary64)
(/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a b) (*.f64 a b))
(*.f64 a b)
a
b
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
y-scale
(*.f64 x-scale (*.f64 x-scale y-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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
b
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))
#s(literal -4 binary64)
(*.f64 b (*.f64 a a))
(*.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.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 (*.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))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
a
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
#s(literal -4 binary64)
(*.f64 (*.f64 b b) a)
(*.f64 b b)
b
(*.f64 x-scale y-scale)
x-scale
y-scale
Outputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64)))) (*.f64 x-scale y-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b)
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 a (*.f64 #s(literal -4 binary64) b))
(*.f64 b (*.f64 a #s(literal -4 binary64)))
a
(*.f64 #s(literal -4 binary64) b)
(*.f64 b #s(literal -4 binary64))
#s(literal -4 binary64)
b
(*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a 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 (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
#s(literal -4 binary64)
(/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a b) (*.f64 a b))
(*.f64 b (*.f64 a (*.f64 b a)))
(*.f64 a b)
(*.f64 b a)
a
b
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
y-scale
(*.f64 x-scale (*.f64 x-scale y-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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 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 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
b
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))
(*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))
#s(literal -4 binary64)
(*.f64 b (*.f64 a a))
(*.f64 a (*.f64 b a))
(*.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 #s(literal -4 binary64) (*.f64 b b)) (/.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 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64)))) (*.f64 x-scale y-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.f64 a (*.f64 x-scale 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 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale y-scale))) a)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal -4 binary64)))))
a
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
#s(literal -4 binary64)
(*.f64 (*.f64 b b) a)
(*.f64 b (*.f64 b a))
(*.f64 b b)
b
(*.f64 x-scale y-scale)
x-scale
y-scale

localize385.0ms (0.3%)

Memory
17.8MiB live, 986.5MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy93.6%
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
accuracy90.4%
(*.f64 (*.f64 b b) a)
accuracy90.3%
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
accuracy83.6%
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
accuracy100.0%
(*.f64 #s(literal -4 binary64) (*.f64 b b))
accuracy92.6%
(/.f64 a (*.f64 x-scale y-scale))
accuracy89.6%
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale)))
accuracy80.7%
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
accuracy93.5%
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy88.8%
(*.f64 b (*.f64 a a))
accuracy84.0%
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy80.1%
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
accuracy99.8%
(*.f64 x-scale (*.f64 x-scale y-scale))
accuracy99.8%
(*.f64 (*.f64 a b) (*.f64 a b))
accuracy94.1%
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
accuracy75.8%
(/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
accuracy99.8%
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b)
accuracy92.6%
(/.f64 a (*.f64 x-scale y-scale))
accuracy89.6%
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
accuracy82.9%
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale))
Samples
190.0ms145×1valid
56.0ms32×2valid
38.0ms79×0valid
Compiler

Compiled 837 to 72 computations (91.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 229.0ms
ival-mult: 72.0ms (31.5% of total)
ival-cos: 44.0ms (19.3% of total)
ival-sin: 40.0ms (17.5% of total)
ival-div: 28.0ms (12.3% 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)
exact: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series127.0ms (0.1%)

Memory
-7.7MiB live, 265.9MiB allocated
Counts
26 → 1 032
Calls
Call 1
Inputs
#s(alt (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) #<representation binary64>) () ())
#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())
#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale 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 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-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) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())
Outputs
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a (*.f64 #s(literal -4 binary64) b)) b) (*.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 a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (patch (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a b)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a b) (*.f64 a b)) (patch (*.f64 (*.f64 a b) (*.f64 a 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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a 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 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (patch (*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ b (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 b (*.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 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (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 (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-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 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #<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 x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (*.f64 y-scale (*.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 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 (* 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 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 (* a (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
#s(alt (* a (pow b 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) a) (patch (*.f64 (*.f64 b b) a) #<representation binary64>) () ())) ())
Calls

258 calls:

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

simplify755.0ms (0.5%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
020737812
176335962
2364734892
0818734252
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))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (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))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/ 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))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 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 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(* -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)))
(/ 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 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) 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)
(* 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 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)
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
(* a (pow b 2))
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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal -1/787320000 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 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (+ (* 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 #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 (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)))) (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)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 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))) (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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(* -4 (/ (* 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal -1/787320000 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 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (+ (* 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 #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 (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)))) (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)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 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))) (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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow 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 a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.f64 a (*.f64 b b)))
(* (pow a 2) (pow b 2))
(*.f64 a (*.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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal -1/787320000 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 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (+ (* 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 #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 (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)))) (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)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 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))) (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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow 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)))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ b (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 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)))
(* -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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal -1/787320000 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 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (+ (* 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 #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 (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)))) (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)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 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))) (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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(* -4 (/ (* 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 (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)))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 a a)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (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 a a) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal -1/787320000 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 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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (+ (* 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 #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 (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)))) (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)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/3149280000 binary64) (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -1/3149280000 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))) (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 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (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 (*.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) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (/.f64 (fma.f64 a (*.f64 a (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (neg.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(/ 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 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 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))
(* 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 a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* (pow a 2) b)
(*.f64 (*.f64 a a) b)
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))
(* a (pow b 2))
(*.f64 a (*.f64 b b))

rewrite311.0ms (0.2%)

Memory
17.3MiB live, 567.6MiB allocated
Algorithm
batch-egg-rewrite
Rules
4 240×lower-*.f32
4 194×lower-*.f64
4 038×lower-/.f32
4 026×lower-/.f64
2 340×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075846
0105712
1431650
23342593
08520588
Stop Event
iter limit
node limit
iter limit
Counts
26 → 1 569
Calls
Call 1
Inputs
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b) (*.f64 x-scale y-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) b)) b)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a b) (*.f64 a b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a b) (*.f64 a 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 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(/.f64 a (*.f64 x-scale y-scale))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 x-scale (*.f64 x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 b (*.f64 a a))
(*.f64 (*.f64 b b) a)
Outputs
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal -4 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (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 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-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 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.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 a (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) 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 a (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 a #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a)) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (neg.f64 a))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 b (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (*.f64 (/.f64 b y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 b (*.f64 a a)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 a x-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) b)) (*.f64 a a))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) b) (*.f64 a a))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a a)) b)
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a b) y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale)) (/.f64 b y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 a x-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-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 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) b) y-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b y-scale)) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) b)) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b y-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 y-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 b (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 b (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 b (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (/.f64 b y-scale))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b (/.f64 b (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) #s(literal -4 binary64))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) y-scale))
(*.f64 (/.f64 b x-scale) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 b (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) y-scale) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) y-scale) (/.f64 #s(literal -4 binary64) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 #s(literal -4 binary64) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) b)) b)
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64)) (/.f64 b x-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 a b))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) b)
(*.f64 (*.f64 a b) (*.f64 #s(literal -4 binary64) b))
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 a (*.f64 b b)) #s(literal -4 binary64))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal -4 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (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 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-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 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.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 a (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) 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 a (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 a #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a)) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (neg.f64 a))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 b (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (*.f64 (/.f64 b y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 b (*.f64 a a)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 a x-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) b)) (*.f64 a a))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) b) (*.f64 a a))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a a)) b)
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a b) y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale)) (/.f64 b y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 a x-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) y-scale))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b)))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a b) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) (*.f64 x-scale x-scale)) y-scale)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 a b))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 a b) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) x-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) (*.f64 x-scale y-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 a b) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) #s(literal -1 binary64))
(*.f64 a (*.f64 b (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (*.f64 a (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 a (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 a (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a b) (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b (*.f64 a a)) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 a b) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 a (*.f64 b b))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 a b))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a b) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) y-scale) (/.f64 b (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 a (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a a)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 a a))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) b) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a a)) #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 a b)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 a a))) #s(literal -1 binary64)) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 a a)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a a))) #s(literal -1 binary64)) (/.f64 b y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 a b)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 a) (log.f64 (*.f64 b b))))
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 b) (*.f64 #s(literal 2 binary64) (log.f64 a))))
(pow.f64 (*.f64 a b) #s(literal 2 binary64))
(pow.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal 1 binary64))
(*.f64 a (*.f64 a (*.f64 b b)))
(*.f64 b (*.f64 b (*.f64 a a)))
(*.f64 (*.f64 a a) (*.f64 b b))
(*.f64 (*.f64 a b) (*.f64 a b))
(*.f64 (*.f64 b (*.f64 a a)) b)
(*.f64 (*.f64 b b) (*.f64 a a))
(*.f64 (*.f64 a (*.f64 b b)) a)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal -4 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (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 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-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 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.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 a (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) 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 a (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 a #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a)) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (neg.f64 a))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 b (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (*.f64 (/.f64 b y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 b (*.f64 a a)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 a x-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) b)) (*.f64 a a))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) b) (*.f64 a a))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a a)) b)
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a b) y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale)) (/.f64 b y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 a x-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) y-scale))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)) #s(literal -1 binary64)))
(neg.f64 (/.f64 b (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (neg.f64 b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 b x-scale)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))))
(/.f64 (neg.f64 b) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 b x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 b x-scale))))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 b x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 b #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (/.f64 b x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 b x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (/.f64 b x-scale) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (neg.f64 (neg.f64 (neg.f64 b))) (neg.f64 (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 b x-scale))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 b (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 b #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (/.f64 b x-scale) x-scale)) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (/.f64 b x-scale) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (/.f64 b x-scale) (*.f64 y-scale y-scale))) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 b x-scale)) #s(literal -1 binary64))
(*.f64 b (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (neg.f64 b) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) b) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) b)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) b) #s(literal -1 binary64)))
(*.f64 (/.f64 b x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) b) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(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 y-scale (*.f64 x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) x-scale)
(*.f64 (neg.f64 (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal -4 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (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 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-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 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.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 a (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) 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 a (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 a #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a)) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (neg.f64 a))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 b (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (*.f64 (/.f64 b y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 b (*.f64 a a)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 a x-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) b)) (*.f64 a a))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) b) (*.f64 a a))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a a)) b)
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a b) y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale)) (/.f64 b y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 a x-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-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 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) x-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) b) y-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b y-scale)) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b))) y-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) b)) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b y-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 y-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) b) (/.f64 b (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 b (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 b (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (/.f64 b y-scale))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b (/.f64 b (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) #s(literal -4 binary64))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) y-scale))
(*.f64 (/.f64 b x-scale) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 b (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) y-scale) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) y-scale) (/.f64 #s(literal -4 binary64) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 #s(literal -4 binary64) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) b)) b)
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 a #s(literal -4 binary64)))) #s(literal -1 binary64)) (/.f64 b x-scale))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 #s(literal -4 binary64) b))
(*.f64 (*.f64 #s(literal -4 binary64) b) b)
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal -4 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (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 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-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 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.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 a (*.f64 b b))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) 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 a (*.f64 b b))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b))
(/.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 a #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a)) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 a))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (neg.f64 a))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (neg.f64 b))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b x-scale))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) b)))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (/.f64 b x-scale) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) (neg.f64 (*.f64 b b))) #s(literal -4 binary64))) (neg.f64 (neg.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)) #s(literal -4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.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 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.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 a (*.f64 b b))) (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a)))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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 a (*.f64 b b))) (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 (*.f64 a b) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 b (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a b) y-scale) (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (*.f64 (/.f64 b y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 b (*.f64 a a)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 a x-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) b)) (*.f64 a a))
(*.f64 (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) b) (*.f64 a a))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a a)) b)
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 a b)) a)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a b) y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 a #s(literal -4 binary64)))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale)) (/.f64 b y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 a x-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-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 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a) y-scale)
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale) x-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale)) x-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a)) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) a)) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) y-scale)) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)) a))
(*.f64 b (*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (*.f64 (/.f64 b (*.f64 x-scale y-scale)) a))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale)) a)
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) x-scale) (*.f64 (/.f64 b y-scale) a))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a (*.f64 b b)) y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 b b)) x-scale))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) x-scale))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 a #s(literal -4 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a #s(literal -4 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) #s(literal -1 binary64)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a (*.f64 b b))))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 #s(literal -4 binary64) b) (*.f64 b (*.f64 a a)))
(*.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (*.f64 a b))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) a)
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a a))) b)
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 a (*.f64 b b)) (*.f64 a #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) a) (*.f64 b b))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64)))
(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 y-scale (/.f64 a x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (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 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 a x-scale))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64))))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 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 (neg.f64 (*.f64 a #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a))) (neg.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 a x-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (/.f64 a y-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 a x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)) #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) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) 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) (*.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 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a x-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(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 y-scale (*.f64 x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) x-scale)
(*.f64 (neg.f64 (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.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)
(*.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 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 a (*.f64 a b))
(*.f64 b (*.f64 a a))
(*.f64 (*.f64 a a) b)
(*.f64 (*.f64 a b) a)
(exp.f64 (+.f64 (log.f64 a) (log.f64 (*.f64 b b))))
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 b) (log.f64 a)))
(pow.f64 (*.f64 a (*.f64 b b)) #s(literal 1 binary64))
(*.f64 a (*.f64 b b))
(*.f64 b (*.f64 a b))
(*.f64 (*.f64 a b) b)
(*.f64 (*.f64 b b) a)

eval495.0ms (0.3%)

Memory
7.1MiB live, 1 073.3MiB allocated
Compiler

Compiled 75 382 to 1 804 computations (97.6% saved)

prune58.0s (38.7%)

Memory
104.2MiB live, 97 120.8MiB allocated

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...